home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
QRZ! Ham Radio 8
/
QRZ Ham Radio Callsign Database - Volume 8.iso
/
pc
/
files
/
mac
/
chess_hc.hqx
/
Chess Stack1.0
/
ChessStack V1.0
/
card_4081.txt
< prev
next >
Wrap
Text File
|
1988-06-28
|
2KB
|
75 lines
-- card: 4081 from stack: in.0
-- bmap block id: 7007
-- flags: 4000
-- background id: 3239
-- name: Title
-- part 2 (button)
-- low flags: 00
-- high flags: A003
-- rect: left=369 top=268 right=309 bottom=466
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Start
----- HyperTalk script -----
on mouseUp
global communicationsMode
if (card field "cm" of card "Options") is "Packet" then
if (card field "hamID" of card "Options") is empty or (card field "TncBaudRate" of card "Options") is empty then
play "no use"
repeat while the sound is not "done"
end repeat
answer "Must set options first!"
else
play "now"
repeat while the sound is not "done"
end repeat
visual effect dissolve
go to card "Main"
end if
else
if (card field "cm" of card "Options") is "Modem" then
if (card field "PhoneNumber" of card "Options") is empty or (card field "ModemBaudRate" of card "Options") is empty then
play "no use"
repeat while the sound is not "done"
end repeat
answer "Must set options first!"
else
play "now"
repeat while the sound is not "done"
end repeat
visual effect dissolve
go to card "Main"
end if
end if
end if
end mouseUp
-- part 3 (button)
-- low flags: 00
-- high flags: A003
-- rect: left=30 top=269 right=312 bottom=131
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Set Options
----- HyperTalk script -----
on mouseUp
visual effect iris open
push card
go to card "Options"
end mouseUp